home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 43
/
Aminet 43 (2001)(GTI - Schatztruhe)[!][Jun 2001].iso
/
Aminet
/
game
/
actio
/
PaybackDemoUp3.lha
/
PaybackDemoUpdate3
/
UpdatePbackDemo-Czech
next >
Wrap
Text File
|
2001-03-21
|
1KB
|
47 lines
; $VER: PaybackDemo Update Version 1.2 (23 February 2001)
; © James Daniels/Apex Designs
(set #installdrawer (cat "Prosím zvolte zaêízení, kde je nainstalováno hratelné demo hry Payback."))
(set #installdrawer-help (cat "Prosím zvolte adresáê, který obsahuje demo verzi hry Payback, pokud si pêejete aktualizaci."))
(set #notfound (cat "\nToto nepêísluîí platné instalaci hratelného dema hry Payback.\nProsím zvolte jiný adresáê."))
(set #install-all (cat "Aktualizuji soubory"))
(set #finished-message (cat "\nTvoje kopie hratelného dema hry Payback byla úspëînë aktualizována."))
(set destdir "RAM:")
(while (= (exists (tackon destdir "PaybackDemo.exe")) 0)
(
(set destdir
(askdir
(prompt #installdrawer)
(help #installdrawer-help)
(default "RAM:")
(disk)
)
)
(if (= (exists (tackon destdir "PaybackDemo.exe")) 0)
(message #notfound)
)
)
)
(complete 10)
(copyfiles
(prompt #install-all)
(source "Files/")
(pattern "#?")
(dest destdir)
)
(complete 100)
(message #finished-message)
(set @default-dest destdir)